home *** CD-ROM | disk | FTP | other *** search
Modula Implementation | 1988-08-16 | 2.1 KB | 59 lines |
- IMPLEMENTATION MODULE KermHelp;
- (************************************************************************)
- (* Help lists all valid commands of Modula-2 Kermit and gives a short *)
- (* explanation *)
- (* written: 08.10.85 Matthias Aebi *)
- (* last modification: 25.02.86 Matthias Aebi *)
- (************************************************************************)
-
- FROM Terminal IMPORT WriteString, WriteLn;
- FROM KermMisc IMPORT ClrScr;
-
- PROCEDURE Help;
- BEGIN
- ClrScr;
- WriteLn;
- WriteString("The following are valid commands:");
- WriteLn;
- WriteLn;
- WriteString(" Bye Logout remote server, quit Kermit");
- WriteLn;
- WriteString(" Connect Connect to remote host and act as a terminal");
- WriteLn;
- WriteString(" DElete Delete files");
- WriteLn;
- WriteString(" DIrectory Display directory information");
- WriteLn;
- WriteString(" Exit Quit Kermit");
- WriteLn;
- WriteString(" Finish Leave server mode at remote server");
- WriteLn;
- WriteString(" Get Get the specified file(s) from remote server");
- WriteLn;
- WriteString(" Help Display this message");
- WriteLn;
- WriteString(" Logout Shut down remote server");
- WriteLn;
- WriteString(" Quit Quit Kermit");
- WriteLn;
- WriteString(" Receive Receive a file from remote host");
- WriteLn;
- WriteString(" SENd Send a file to remote host");
- WriteLn;
- WriteString(" SERver Enter server mode");
- WriteLn;
- WriteString(" SET Set local Kermit parameter");
- WriteLn;
- WriteString(" SHow Show local parameters");
- WriteLn;
- WriteString(" Type Display a textfile at the screen");
- WriteLn;
- WriteString(" Version Display the current M2-Kermit version");
- WriteLn;
- WriteLn;
- WriteString(" Allowable abbreviations are shown in capital letters");
- WriteLn;
- END Help;
-
- END KermHelp.
-